home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
kermit.columbia.edu
/
kermit.columbia.edu.tar
/
kermit.columbia.edu
/
newsgroups
/
misc.19950329-19950528
/
000021_news@columbia.edu_Sat Apr 1 17:07:23 1995.msg
< prev
next >
Wrap
Internet Message Format
|
1995-07-31
|
3KB
Received: from apakabar.cc.columbia.edu by watsun.cc.columbia.edu with SMTP id AA22578
(5.65c+CU/IDA-1.4.4/HLK for <kermit.misc@watsun.cc.columbia.edu>); Sat, 1 Apr 1995 12:25:52 -0500
Received: by apakabar.cc.columbia.edu id AA21815
(5.65c+CU/IDA-1.4.4/HLK for kermit.misc@watsun); Sat, 1 Apr 1995 12:25:21 -0500
Path: news.columbia.edu!panix!news.mathworks.com!news.alpha.net!uwm.edu!lll-winken.llnl.gov!enews.sgi.com!decwrl!purdue!mozo.cc.purdue.edu!nettle.ecn.purdue.edu!laird
From: laird@nettle.ecn.purdue.edu (Kyler Laird)
Newsgroups: comp.protocols.kermit.misc
Subject: Re: starting SLIP from Ckermit (OS/2 beta)
Date: 1 Apr 1995 17:07:23 GMT
Organization: Purdue University
Lines: 125
Message-Id: <3lk18b$dih@mozo.cc.purdue.edu>
References: <3liark$asl@sunny.bahnhof.se>
Nntp-Posting-Host: nettle.ecn.purdue.edu
X-Newsreader: NN version 6.5.0 (NOV)
Apparently-To: kermit.misc@watsun.cc.columbia.edu
>Is anyone using this feature in the new 191 beta release yet?
>I would like to se an example-script if you have one.
------
; PUCC_SLIP.KRM
; Use this script to SL/IP into PUCC from OS/2 Warp
; using C-Kermit 5A(191)
;--------------------
;variable definitions
;--------------------
;serial port number
def \%o 1
;machine name
;def \%m coastal.ecn.purdue.edu
def \%m nettle.ecn.purdue.edu
;machine address (use "tia -address" to find out)
;def \%a 128.46.161.160
def \%a 128.46.161.85
;login
def \%l laird
;password
def \%p secret
;shell prompt
def \%r %
;---------------------------------
;set to bogus line so that SLIP.EXE can start
set line com0
;start SLIP.EXE
!start "SL/IP into PUCC" /n /min slip -com\%o -ifconfig 192.0.2.1 \%a +defaultroute -p2 -rtscts
;wait for SL/IP connection to initialize
!slipwait
;"share" port with SLIP.EXE
set line slipcom\%o
set speed 57600
;call PUCC
:DIAL
dial 496-1440
if error goto DIAL
;get initial prompt
output \013
input 5 username>
if error goto DIAL
;send bogus userid 'cause it doesn't matter
output os2user\013
;get annex prompt
input 10 >
if error goto DIAL
;telnet to machine
output telnet \%m\013
;perform login sequence
unixlogin \%l \%p \%r
if error goto DIAL
;output BREAK to get back to annex prompt
output \b
;get annex prompt
input 5 >
if error goto DIAL
;get a clean connection
output set session passall\013
;get annex prompt
input 5 >
if error goto DIAL
;return to telnet session
output fg\013
;get another shell prompt
output \013
input 5 \%r
if error goto DIAL
;turn off messages and start TIA
output mesg n;tia\013
;get TIA acknowledgement
input 10 eady
if error goto DIAL
;release shared serial port by setting to bogus port
set line com0
;*Note that you could just put "quit" here.
; The SL/IP stuff is all going on in another session.
; The following is just because I usually want to run
; telnet.
; You could also add lines like
;!start EXPLORE.EXE
; so that TCP/IP applications (like Web Explorer) will
; automatically start after connection.
;connect to machine via TCP/IP (telnet)
net tcp/ip \%m
;login to machine (again)
unixlogin \%l \%p \%r
;present terminal emulation screen
connect